home *** CD-ROM | disk | FTP | other *** search
/ HamCall (October 1991) / HamCall (Whitehall Publishing)(1991).bin / bcast / bcstcble / antgain.asc < prev    next >
Text File  |  1990-10-14  |  481b  |  12 lines
  1. 10    CLS
  2. 20    PRINT"Program computes gain of parobolic antenna"
  3. 30    INPUT "Antenna diameter in feet                 ";D
  4. 40    INPUT "Frequency in gHz.                        ";F
  5. 50    G=(8.6859*LOG(D))+(8.6859*LOG(F))+7.5
  6. 60    A=G+2.15
  7. 70    PRINT "Antenna gain in dBi is                    ";G
  8. 80    PRINT "Antenna gain in dBd is                    ";A
  9. 100   INPUT "Do again                                 ";A$:A=ASC(A$)
  10. 110   IF A=89 OR A=121 THEN 10
  11. 120   END
  12.